/* Copyright (c) Oracle Corporation 1992.  All Rights Reserved */
/*****************************************************************************
  NAME
    nets22.ins - Windows 95 V3 installation script for SQL*Net.

  DESCRIPTION
    This script performs the installation tasks for the Windows 95 SQL*Net
    product.

  VERSION
    2.2.0.0.0

  OWNER
    Mason Ng

  MODIFIED    DD-MMM-YY Reason
    trodgers  10-APR-92 Created.
    zkhan     11-AUG-93 Modified for SQLNET and for using V3.0.9.3.2 or later
			of the installer.
    mng       05-JAN-94 Modified for NT.
    eflores   06-APR-94 Modified for 2.1.2
    dlau      07-AUG-95 Modified for SQLNET 2.2
    vraja     22-AUG-95 Create the SQL*Net V2 Listener Service
    LMurphy   07-SEP-95 Modified for Windows 95
*****************************************************************************/
{
  if (doit)
  {
    ins_ratchet = "2.2.2.0.0";

    execute("%installer_home%\win95.ins");

    install(w95rsf72);
    install(w95netclt22);

    ui_product(product_label);

    permit_retry_operations = TRUE;

    ui_action(instantiate(net2_install_dll));
    copy(dll); 

    ui_action(instantiate(net2_install_exe));
    copy(exe);
   
    ui_action(instantiate(net2_install_script));
    copy(deinstl);

    ui_action(instantiate(net2_install_sample));
    copy(sample);

    {
      host_name = win32_get_value("HKEY_LOCAL_MACHINE",
                                  "System\CurrentControlSet\Services\VxD\MSTCP",
                                  "HostName");
    }
    ['INVALID_KEY, 'FILE_NOT_FOUND, 'OS_ERROR: 
      {
        host_name = win32_get_value("HKEY_LOCAL_MACHINE",
                                    "System\CurrentControlSet\Control\ComputerName\ComputerName",
                                    "ComputerName");
      }
      ['INVALID_KEY, 'FILE_NOT_FOUND, 'OS_ERROR: host_name = "default_computer_name";]
    ]
    /* save listener.ora as listener.old */
    permit_retry_operations = FALSE;
    {
    move_file("%oracle_home%\network\admin\listener.ora","%oracle_home%\network\admin\listener.old");
    }
    ['INVALID_FILE_NAME, 'PERMISSION_DENIED, 'WRITE_ERROR, 'FILE_NOT_FOUND, 'OS_ERROR: continue();]

    if (copy_tcp_lsnr)
       copy(lsnr, "tcp");
    if (copy_spx_lsnr)
      copy(lsnr, "spx");

    ui_action(instantiate(net2_register));
    register(current_product);

    modify("LISTENER_STARTUP","AUTO",ora_config,(product_filename(current_product)));

    if (member(selected_products,current_product))
	reference(current_product);
    reference(w95rsf72, current_product);
    permit_retry_operations = FALSE;
  }
}
